
program define mybstrpadjr2areg, eclass
         version 11
         bootstrap e(r2_a), reps(1000):  areg `0', absorb(_parXcou_)
         tempname b V
         mat `b' = e(b)
         mat `V' = e(V)
         mat colnames `b' = "Adjusted R-Squared"
         mat colnames `V' = "Adjusted R-Squared"
         mat rownames `V' = "Adjusted R-Squared"
         eret post `b' `V'
         eret local cmd myadjr2areg
end
